<?php
    /**
     * Created by PhpStorm.
     * User: jackhhy
     * Date: 2019/6/28-11:18
     * Link: https://gitee.com/luckygyl/lucky_admin
     * FileName: AuthService.php
     * Keys: ctrl+alt+L/ctrl+s(代码格式化) ctrl+J(代码提示) ctrl+R(替换)ALT+INSERT(生成代码(如GET,SET方法,构造函数等) , 光标在类中才生效)
     * CTRL+ALT+O (优化导入的类和包 需要配置) SHIFT+F2(高亮错误或警告快速定位错误)
     * CTRL+SHIFT+Z(代码向前) CTRL+SHIFT+/ (块状注释) ctrl+shift+enter(智能完善代码 如if())
     * 权限认证
     */

    /**
     * 权限认证类
     * 功能特性：
     * 1，是对规则进行认证，不是对节点进行认证。用户可以把节点当作规则名称实现对节点进行认证。
     *      $auth=new Auth();  $auth->check('规则名称','用户id')
     * 2，可以同时对多条规则进行认证，并设置多条规则的关系（or或者and）
     *      $auth=new Auth();  $auth->check('规则1,规则2','用户id','and')
     *      第三个参数为and时表示，用户需要同时具有规则1和规则2的权限。 当第三个参数为or时，表示用户值需要具备其中一个条件即可。默认为or
     * 3，一个用户可以属于多个用户组(think_auth_group_access表 定义了用户所属用户组)。我们需要设置每个用户组拥有哪些规则(think_auth_group 定义了用户组权限)
     * 4，支持规则表达式。
     *      在think_auth_rule 表中定义一条规则时，如果type为1， condition字段就可以定义规则表达式。 如定义{score}>5  and {score}<100
     * 表示用户的分数在5-100之间时这条规则才会通过。
     */
    //数据库
    /*
    -- ----------------------------
    -- think_auth_rule，规则表，
    -- id:主键，name：规则唯一标识, title：规则中文名称 status 状态：为1正常，为0禁用，condition：规则表达式，为空表示存在就验证，不为空表示按照条件验证
    -- ----------------------------
    DROP TABLE IF EXISTS `think_auth_rule`;
    CREATE TABLE `think_auth_rule` (
        `id` mediumint(8) unsigned NOT NULL AUTO_INCREMENT,
        `name` char(80) NOT NULL DEFAULT '',
        `title` char(20) NOT NULL DEFAULT '',
        `type` tinyint(1) NOT NULL DEFAULT '1',
        `status` tinyint(1) NOT NULL DEFAULT '1',
        `condition` char(100) NOT NULL DEFAULT '',  # 规则附件条件,满足附加条件的规则,才认为是有效的规则
        PRIMARY KEY (`id`),
        UNIQUE KEY `name` (`name`)
    ) ENGINE=MyISAM  DEFAULT CHARSET=utf8;
    -- ----------------------------
    -- think_auth_group 用户组表，
    -- id：主键， title:用户组中文名称， rules：用户组拥有的规则id， 多个规则","隔开，status 状态：为1正常，为0禁用
    -- ----------------------------
    DROP TABLE IF EXISTS `think_auth_group`;
        CREATE TABLE `think_auth_group` (
        `id` mediumint(8) unsigned NOT NULL AUTO_INCREMENT,
        `title` char(100) NOT NULL DEFAULT '',
        `status` tinyint(1) NOT NULL DEFAULT '1',
        `rules` char(80) NOT NULL DEFAULT '',
        PRIMARY KEY (`id`)
    ) ENGINE=MyISAM  DEFAULT CHARSET=utf8;
    -- ----------------------------
    -- think_auth_group_access 用户组明细表
    -- uid:用户id，group_id：用户组id
    -- ----------------------------
    DROP TABLE IF EXISTS `think_auth_group_access`;
        CREATE TABLE `think_auth_group_access` (
        `uid` mediumint(8) unsigned NOT NULL,
        `group_id` mediumint(8) unsigned NOT NULL,
        UNIQUE KEY `uid_group_id` (`uid`,`group_id`),
        KEY `uid` (`uid`),
        KEY `group_id` (`group_id`)
    ) ENGINE=MyISAM DEFAULT CHARSET=utf8;
     */

    namespace service;

    use think\Db;
    use think\Config;
    use think\Session;
    use think\Request;
    use think\Loader;

    class AuthService
    {

        /**
         * @var object 对象实例
         */
        protected static $instance;
        /**
         * 当前请求实例
         * @var Request
         */
        protected $request;

        //默认配置
        protected $config = [
            'auth_on'           => 1, // 权限开关
            'auth_type'         => 1, // 认证方式，1为实时认证；2为登录认证。
            'auth_group'        => 'auth_group', // 用户组数据表名
            'auth_group_access' => 'auth_group_access', // 用户-用户组关系表
            'auth_rule'         => 'auth_rule', // 权限规则表
            'auth_user'         => 'member', // 用户信息表
        ];

        /**
         * 类架构函数
         * Auth constructor.
         */
        public function __construct()
        {
            //可设置配置项 auth, 此配置项为数组。
            if ($auth = Config::get('auth')) {
                $this->config = array_merge($this->config, $auth);
            }
            // 初始化request
            $this->request = Request::instance();
        }

        /**
         * 初始化
         * @access public
         * @param array $options 参数
         * @return \think\Request
         */
        public static function instance($options = [])
        {
            if (is_null(self::$instance)) {
                self::$instance = new static($options);
            }

            return self::$instance;
        }

        /**
         * 检查权限
         * @param        $name     StringService|array  需要验证的规则列表,支持逗号分隔的权限规则或索引数组
         * @param        $uid      int           认证用户的id
         * @param int    $type     认证类型
         * @param StringService $mode     执行check的模式
         * @param StringService $relation 如果为 'or' 表示满足任一条规则即通过验证;如果为 'and'则表示需满足所有规则才能通过验证
         * @return bool               通过验证返回true;失败返回false
         */
        public function check($name, $uid, $type = 1, $mode = 'url', $relation = 'or', $memType = '')
        {
            if (!$this->config['auth_on']) {
                return true;
            }
            // 获取用户需要验证的所有有效规则列表
            $authList = $this->getAuthList($uid, $type);
            //        var_dump($authList);
            if (is_string($name)) {
                $name = strtolower($name);
                if (strpos($name, ',') !== false) {
                    $name = explode(',', $name);
                } else {
                    $name = [$name];
                }
            }
            $list = []; //保存验证通过的规则名
            if ('url' == $mode) {
                $REQUEST = unserialize(strtolower(serialize($this->request->param())));
            }
            foreach ($authList as $auth) {
                $query = preg_replace('/^.+\?/U', '', $auth);
                if ('url' == $mode && $query != $auth) {
                    parse_str($query, $param); //解析规则中的param
                    $intersect = array_intersect_assoc($REQUEST, $param);
                    $auth      = preg_replace('/\?.*$/U', '', $auth);
                    if($memType){
                        $auth = str_replace('_','',$auth);
                    }
                    if (in_array($auth, $name) && $intersect == $param) {
                        //如果节点相符且url参数满足
                        $list[] = $auth;
                    }
                } else {
                    if($memType){
                        $auth = str_replace('_','',$auth);
                    }
                    if (in_array($auth, $name)) {
                        $list[] = $auth;
                    }
                }
            }
            if ('or' == $relation && !empty($list)) {
                return true;
            }
            $diff = array_diff($name, $list);
            if ('and' == $relation && empty($diff)) {
                return true;
            }

            return false;
        }

        /**
         * 根据用户id获取用户组,返回值为数组
         * @param  $uid int     用户id
         * @return array       用户所属的用户组 array(
         *              array('uid'=>'用户id','group_id'=>'用户组id','title'=>'用户组名称','rules'=>'用户组拥有的规则id,多个,号隔开'),
         *              ...)
         */
        public function getGroups($uid)
        {
            static $groups = [];
            if (isset($groups[$uid])) {
                return $groups[$uid];
            }
            // 转换表名
            $auth_group_access = Loader::parseName($this->config['auth_group_access'], 1);
            $auth_group        = Loader::parseName($this->config['auth_group'], 1);
            // 执行查询
            $user_groups  = Db::view($auth_group_access, 'uid,group_id')
                ->view($auth_group, 'title,rules', "{$auth_group_access}.group_id={$auth_group}.id", 'LEFT')
                ->where("{$auth_group_access}.uid='{$uid}' and {$auth_group}.status='1'")
                ->select();
            $groups[$uid] = $user_groups ?: [];

            return $groups[$uid];
        }

        /**
         * 获得权限列表
         * @param integer $uid 用户id
         * @param integer $type
         * @return array
         */
        protected function getAuthList($uid, $type)
        {
            static $_authList = []; //保存用户验证通过的权限列表
            $t = implode(',', (array)$type);
            if (isset($_authList[$uid . $t])) {
                return $_authList[$uid . $t];
            }
            if (2 == $this->config['auth_type'] && Session::has('_auth_list_' . $uid . $t)) {
                return Session::get('_auth_list_' . $uid . $t);
            }
            //读取用户所属用户组
            $groups = $this->getGroups($uid);
            $ids    = []; //保存用户所属用户组设置的所有权限规则id
            foreach ($groups as $g) {
                $ids = array_merge($ids, explode(',', trim($g['rules'], ',')));
            }
            $ids = array_unique($ids);
            if (empty($ids)) {
                $_authList[$uid . $t] = [];

                return [];
            }
            $map = [
                'id'   => ['in', $ids],
                'type' => $type
            ];
            //读取用户组所有权限规则
            $rules = Db::name($this->config['auth_rule'])->where($map)->field('condition,name')->select();
            //循环规则，判断结果。
            $authList = []; //
            foreach ($rules as $rule) {
                if (!empty($rule['condition'])) {
                    //根据condition进行验证
                    $user    = $this->getUserInfo($uid); //获取用户信息,一维数组
                    $command = preg_replace('/\{(\w*?)\}/', '$user[\'\\1\']', $rule['condition']);
                    @(eval('$condition=(' . $command . ');'));
                    if ($condition) {
                        $authList[] = strtolower($rule['name']);
                    }
                } else {
                    //只要存在就记录
                    $authList[] = strtolower($rule['name']);
                }
            }
            $_authList[$uid . $t] = $authList;
            if (2 == $this->config['auth_type']) {
                //规则列表结果保存到session
                Session::set('_auth_list_' . $uid . $t, $authList);
            }

            return array_unique($authList);
        }

        /**
         * 获得用户资料
         * @param $uid
         * @return mixed
         */
        protected function getUserInfo($uid)
        {
            static $user_info = [];

            $user = Db::name($this->config['auth_user']);
            // 获取用户表主键
            $_pk = is_string($user->getPk()) ? $user->getPk() : 'uid';
            if (!isset($user_info[$uid])) {
                $user_info[$uid] = $user->where($_pk, $uid)->find();
            }

            return $user_info[$uid];
        }

    }